Top 10k strings from Letta-Head Plus (1985)(Bradway Software)(Side A).tzx in <root> / bin / z80 / software / Sinclair Spectrum Collection TOSEC.exe / Sinclair ZX Spectrum - Utilities & Educational / Sinclair ZX Spectrum - Utilities & Educational - [TZX] (TOSEC-v2007-01-01) /

Back to the directory listing

   8 "23675",o:
   6 f$(l)="s")+(
   5 li,col;m$(
   5 *"m";dr;f$
   4 Select option                   ";b$
   4 Input filename   !
   4 "256"+fad)
   3 "61156",ph
   3 "61155",pw:
   3  design menu
   2 start drive #: for mdv!
   2 o;"               ";b$
   2 li,col,m$:
   2 l+l;b$;b$;
   2 l+l,o;"Please ensure paper feed is OK  
   2 f$(l+l)=":"
   2 f$(l)="s";"
   2 f$(l)="s";
   2 f$(l)="b"):
   2 f$(l)="b"),(
   2 f$(l)="b")
   2 eading or 
   2 This will take about       min. ";
   2 Filename?;"" "" for next tape file                or microdrive #:
   2 Are you sure? Y/N";
   2 )        ";b$
   2 "lettacode"
   2 "8"*pw*(sex>
   2 "61153",sex:
   2 "51914",o:
   2 "255"*(lw>
   2 "255")+lw*(lw
   2 "23678",acy:
   2 "23677",acx:
   2 "175"-ssy:
   2 "127"*(lh>
   2 "127")-lh*(lh
   2 "11";"    ":
   2 "1065"*((i$
   2 "100","end"
   2  to main menu",
   2  copy menu
   2   now"'"loaded into memory store        
   2   now"'"loaded into UDG area            
   2                                 !
   1 |{...Print One Set  !j{
   1 |...Save Set       !
   1 |...Quit Program   !
   1 |...Load Block     !
   1 {...Edit Character !
   1 {...Copy Set To Set!
   1 {*** LETTA-HEAD+ EDFONTERATOR ***!
   1 yINVALID OPTION!
   1 y(l+l)=cy:
   1 x(l+l)=x(l):
   1 x(l+l)=cx:
   1 vtab=lht+vsep-
   1 sy=sy+th-l:
   1 sx=sx+th-l:
   1 sx-n,by+n:
   1 start drive #: for mdv!g
   1 start drive #: for mdv!:
   1 sht=l-(sht=l):
   1 scpatch   
   1 s$=s$(l)+s$:
   1 s$(z)="A":
   1 s$(z)="0":
   1 rogram linefeeds ";"
   1 rint label?          ";b$
   1 rint heading?        ";b$
   1 orm length",
   1 ont             
   1 ocation",k,k,"end"
   1 o;"       Please re-enter                 
   1 o;"                 ";b$
   1 o;"                    ";b$
   1 o,by-sy+n+n:
   1 o,-(by-sy+n+n):
   1 nterfaces",
   1 ncy=cy-l+(cy=sh):
   1 ncy=cy+l-(cy=
   1 ncx=cx-l+(cx=o):
   1 ncx=cx+l-(cx=sw):
   1 nches                       or 
   1 ll or define size with cursor  and 
   1 li,col;m$:
   1 lettahead 
   1 lettacode 
   1 l;"Input fraction of circle":
   1 l,o;b$;b$:
   1 l+l,n-l;i$:
   1 l$(e)="H":
   1 inefeed code ";
   1 icrodrive back-up copy"'"
   1 i$="B")+("set"
   1 g|...Load Set       !U|
   1 f$=("block"
   1 f$(l)=" ")
   1 et?                   ";b$
   1 equential number"
   1 edfont    .
   1 edcode     I `
   1 eExponent expected
   1 e+e,o,"width=",e+e,
   1 e+e,e+e;l$(
   1 e+e,e+e;"Reload"
   1 e"Nt!Nt"=\>
   1 e"$`!Rt"Pt!
   1 cx=cx+((ct-cx)
   1 cx-acx,cy-acy:
   1 cx-acx,cy-acy,
   1 cx-(cx>l),cy:
   1 cx,cy-(cy>48
   1 cx,cy+(cy<175
   1 cx+(cx<255
   1 change?                 
   1 c$=c$+("tape "
   1 c$="Save ":
   1 c$="Load ":
   1 by=by-th+l:
   1 bx=bx-th+l:
   1 bx-sx+n+n,o:
   1 b$="                                "
   1 arriage return code ";
   1 acx,acy,a:
   1 abel?        ";b$
   1 abel?         ";b$
   1 `~                  !N~
   1 WRITELN('Re8
   1 Unamed mdv file
   1 Type your linefeed code         ";b$
   1 Type your carriage return code  ";b$
   1 Tasman interface type A, B or C?";b$
   1 Tape Error
   1 System Call Error
   1 Single sheet mode:              Press any key to start printing 
   1 Set label size   
   1 Set cursor to sequence start    position ajd 
   1 Sequence option inactivated
   1 Sequence format:  
   1 Scroll using cursor control keys                
   1 Save which set?          !Z
   1 Save to which set?       !1
   1 SAVING file 
   1 RS232 baud rate =               
   1 Print any character             or s/shift F,W,D,Q,E   
   1 Out of RAM
   1 Number too large
   1 Number expected
   1 M{...Print All Sets !;{
   1 Maths Call Error
   1 Load which set?          !
   1 Letta-Head Plus - Side A
   1 Key source set           !
   1 Key required set (9=quit)!|
   1 Key destination set      !
   1 Key any option           !~
   1 JRWALKER1984
   1 J. R. Walker
   1 Input your RS232 baud rate      ";b$
   1 Input vertical separation             in inches                 "
   1 Input start of sequence or "" ""                 to inactivate    "
   1 Input start column no. (2-120)  ";b$
   1 Input print width  (
   1 Input print depth  (
   1 Input line thickness (
   1 Input label width in inches     ";b$
   1 Input label height in inches    ";b$
   1 Input horizontal separation           in inches                 "
   1 Input form length; start 
   1 Input filename    Start drive #:                  for microdrive
   1 Input file name - Start drive #:";b$
   1 Input 1 for Opus d/drive, 0 for tape, or mdv number             "
   1 Index too Low
   1 Index too High
   1 How many labels wide on your             sheet?                 
   1 How many labels do you want?    ";b$
   1 How many copies do you want?    ";b$
   1 Halt at PC=
   1 HOW MANY INCHES OR LINES?";
   1 GetOpt('Key require
   1 For Tony Barnett
   1 Filename >10 chars
   1 File must be named
   1 FORM LENGTH ";fl;g$;" IS WRONG!
   1 Enter copy width (1-9)                            
   1 Enter copy height (1-2)                           
   1 Download font ";f;" to your         printer RAM? 
   1 Display which set?       !
   1 Display stored - Input drive #  ";b$
   1 Display stored -                Alter status   
   1 C}Key required character    !)}
   1 CIRCLE TOO BIG!";
   1 CHR(11),'7':Up
   1 CHR(10),'6':Down;
   1 CATALOGUING microdrive ";i$
   1 Bradway Software
   1 BOX TOO BIG!";
   1 Any key to continue!
   1 Any key to continue             ";b$
   1 ?                         ";c$;f$;
   1 ;"cy=";cy;"  "
   1 ;"cx=";cx;"  ";
   1 8|...Save Block     !&|
   1 2c`2``!&`"a`!:g"d`!
   1 -(bx-sx+n+n),o:
   1 *** LETTA-HEAD+ EDFONTERATOR ***!
   1 *"m";dr;"lettacode"
   1 )      ";b$
   1 (lq/law+l*(
   1 (lq/law)<lq/law)):
   1 (l+n*(lw+hsep)/
   1 'TZXed by Andrew Barker
   1 %~EMODE! ~
   1 "lettahead"
   1 "9");"Opus
   1 "8"*pw-pw*
   1 "8"*pw)-pw*
   1 "8"*ph*(cy-
   1 "8"*(cy<sh+
   1 "8"*(cx>sw-
   1 "8")="1.62":
   1 "8");"dk'tronics"
   1 "8")+("    "
   1 "70");"lash
   1 "7");"Morex cent.
   1 "66");"eep
   1 "61153",cx:
   1 "61020"+pw:
   1 "6";lq-p*law:
   1 "6";lf;" "'"
   1 "6";cr;" "'"
   1 "6");"ZX LPrint III"
   1 "51917",sy:
   1 "51917",(cy-8
   1 "51916",sh:
   1 "51916",cy:
   1 "51916",by:
   1 "51915",bx:
   1 "51914",sx:
   1 "51914",sw:
   1 "51756"+n,tab:
   1 "51754",law:
   1 "51753",l:
   1 "51753",d-l
   1 "51616"+x)
   1 "51608"+x)=
   1 "51328",cr:
   1 "51307",l+l
   1 "51307",cw:
   1 "51262",l+l:
   1 "51262",cw:
   1 "51224"=cr):
   1 "51224",n:
   1 "51224",cr:
   1 "51181",n:
   1 "51181",lf:
   1 "51162"*(ch=l)+
   1 "51129">o;"
   1 "51129"=o'"  (ON to print >1 label wide!)"
   1 "51129"=lf):
   1 "51129",n:
   1 "51129",lf:
   1 "51124",cr:
   1 "51103",cw:
   1 "51039"*(ch=l+l))
   1 "51021",n:
   1 "51021",lf:
   1 "50791",cy:
   1 "50790",cx:
   1 "50719"=o);"RamPrint"
   1 "50719"=l+l);"Interface 1"
   1 "50719"=l+l
   1 "50719"=l);"Hilderbay
   1 "50649",fad+
   1 "5000"*(i$="P")+
   1 "5000"*(i$="L")+
   1 "5";b$;#o;
   1 "5");"Tasman
   1 "4000"*(i$="P")+
   1 "4000"*(i$="H")+
   1 "4");"Kempston E"
   1 "3000"*(i$="L")+
   1 "3000"*(i$="D")+
   1 "30";"  ":
   1 "3");"Kempston
   1 "29";"   ":
   1 "28";"    "
   1 "23658"=o):
   1 "23658"=o)
   1 "23658",o:
   1 "2264"+(l+l
   1 "2260"+(l+l
   1 "22";"File";
   1 "2000"*(i$="H")+
   1 "2000"*(i$="D")+
   1 "2"*t*(ch=l+l))*q)
   1 "19";"   ";
   1 "19";"    ":
   1 "19",o,"Vert.  Sep.",
   1 "18";"          ":
   1 "18",o,"Horiz. Sep.",
   1 "18",o,"Height:",
   1 "175"-sh)/
   1 "17";"   ":
   1 "17";"    ";
   1 "17",o;b$;b$;b$;b$
   1 "17",o,"Width:",
   1 "15");"NUL"
   1 "14";("CAPS"
   1 "14");"","
   1 "13","height=",k,k,"end"
   1 "13");"Interprinter"
   1 "12");"Disciple
   1 "11";fl;g$;
   1 "11");"Indescomp"
   1 "1060"*((i$
   1 "1055"*((i$
   1 "10");"S128 RS232
   1 "1";"lettahead"
   1 "1";"lettacode"
   1 ","4","5","0","
   1 ","0","I","L":
   1 ","0","A","F","
   1  to quit",
   1  to mdv ";dr
   1  to main menu",k,k,"end"
   1  to main menu
   1  to font "
   1  to design                  
   1  set coords
   1  print menu
   1  on mdv ";dr;
   1  main menu
   1  cassette label"
   1  ['E','e','S','s'];
   1  Richard Walker        !
   1  J R Walker 1985       
   1  = current status"
   1  1.8              
   1      Bradway Software, 1985     !
   1       ";b$
   1        LETTA-HEAD 
   1         !r
   1         !C
   1                          !
   1                                 !6
   1                   
   1                
   1               
   1